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ESTENSONE BASIC PER H. PIOTTER 15» 


PREMESSA 

Il BASOTTER è un insieme di programmi realizzati per esaltare e focilitare l'uso del 
Motter/stomponte 1520. 

Questo prodotto è stato realizzato tenendo presente le esigenze dell'utente che, 
acquistando un precotto come il Plotter 1520, sia in grado entro breve termine, di 
usare la macchina in modo produttivo. 

Infatti l’implementazione dei comandi basic e la struttura degli stessi, permettono o 
chiurique, anche digiuno di tecnica di programnnazione, di usare il Plotter/stom- 
pante 1520 immediatamente. 

Ci congratuliamo quindi per l'acquisto do lei fatto e sicuramente converrò con noi 
che raramente si è avuto la disponibilità di un prodotto che comprenda tante ca¬ 
ratteristiche contemporaneamente come: facilitò d'uso, basso costo, prestazioni 
sofisticate e l'ormai famosa affidabilità Commodore. 

Grazie per aver scelto Commodore e buon lavoro. 


L Angeli 

Commodore Itoliona 
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INTRODUZIONE 

Il Basolter è un programmo per il Commodore 64 che rende più focile ed immedia¬ 
to l'uso del Plotter 1520. 

Lo configurazione necessaria per l'uso del Basolter è costituito dal Commodore 
64, dallo unita a disco 1541, e dal plotter 1520. 


INSTALLAZIONE 

Collegate l'unità a disco al C64, ed il Plotter all'unità a disco, tramite le porte seria¬ 
li. Dote alimentazione, nell'ordine, a Plotter, disco e C64. 

Inserite il dischetto contenente il Bosotter nell'unità a disco. 

Scrìvete il comando LOAD"^",B,1. 

Aspettate che il C64 carichi il programmo dal disco (durante il periodo di carica¬ 
mento apparirò una figura sullo sd>ern>o). 

Quando il coricamento è terminato, compare sullo schermo il solito prompt 
"READY." del Bosic. 

A questo punto, siete pronti per incominciare; buon divertimento con il Basotterlll 
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Il FUNZIONAMENTO DEL 1520 

Quando il 1520 lavoro il modo grafico, le quottro penne di cui dispone possono 
spaziare in un campo lorgo ben 480 punti e olto 19^; il 1520 può trocciare linee, 
spostore lo penna oa un punto all'altro, cambiare colore e usore un sistema di rife¬ 
rimento definito doll'utente. Tuttavia la gestione di questi comondi basic risultava 
abbostanzo noiosa, o cousa dei più files che ero necessario tenere aperti, delie 
sintassi poco naturali, e della difficile gestione basata sul "secondory address". 
Sotto questo punto di vista, Bosotter compie un notevole posso avanti, introducen¬ 
do comandi doH'uso semplice ed intuitivo, consentendo inoltre di tracciare cerchi, 
parti di cerchi e settori, di realizzare disegni e diagrammi a torto, nonché disegna¬ 
re quadrati e rettangoli. 

Uno delle peculioritò del 1520 è quella di poter lavorare o con il sisterrKi di riferi¬ 
mento stondord o con uno definibile. Il sistema standard, attivato all'accensione, 
consiste nel definire lo spazio entro al quale si muovono le penne come i settori 1 e 
4 di un normale sistema di ossi cartesiani, le cui ascisse saranno sempre positive. 
Per lavorare anche con coordinate di ascissa negativa, è necessario ridefinire l'o¬ 
rigine del nostro sistema cartesiano, traslondo gli assi. 

Ad esempio, traslondo l'origine nel punto 220,10 (relativo al sistemo assoluto pre¬ 
cedente), tutti i punti e le linee che verranno disegnate saranno spostate a destra di 
220 punti e in alto di 10, rispetto al sistema assoluto normale. 

Ciò é molto utile in quanto, oltre o permettere di traslore qualsiasi figura senza ap¬ 
portare grosse modifiche ai programmi, consente di lavorare anche con i settori 2 
e 3 del pianto cartesiano e, quindi, di lavorare con punti di ascissa negativa. 


I COMANDI GRAFICI 

II Basotter fornisce i seguenti conrandi orientati alla gestione dello grafico del 
1520; 


Versione itoliorKi 

PENNA 

ZERO= 

ZERO 

LINEA 

REL 

ASS 

VAI 

TRAI 

ARCO 

SETTORE 

SCALA 

REHANGOLO 


Versione inglese 

PENIS 

SET HOME 

HOME 

LINE 

RELATIVE 

ASSOLUTE 

MOVE 

DASH 

ARC 

SECTOR 

SCALE 

BOX 
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PENNA 

Il comando penna serve per cambiare il colore con il quale si vuole scrivere. 
Deve essere seguito dal numero del colore che si vuole selezionare oppure dal no¬ 
me del colore stesso. 

I codici colore sono i seguenti: 

O...NERO (BLACK) 

1.. .BLU (BLUE) 

2.. .VERDE (GREEN) 

3.. .ROSSO (RED) 

Esempio: battere il coniando diretto; PENNA 0 oppure PENNA BLU e premere 
RETURN. 

II 1520 risponderà facendo ruotare il tamburo portapenne finché lo penna blu non 
si troverà in cimo. Nel coso in cui fosse già selezionata lo penna blu il 1520 ignore¬ 
rà il comando. 


LINEA 

Il comando lineo traccio un segmento. I punti do unire devono essere specificati fa¬ 
cendo seguire al comondo lo ascissa del primo punto, uno virgola, l'ordinato del 
primo punto, un TO, l'ascissa del secondo punto, una virgola e l'ordinata del se¬ 
condo punto. 

LINEA 0,0 TO 100,10 

Il 1520 porterà lo penna olle coordinate 0,0, e traccerà una lineo fino al punto 

100 , 10 . 

È possibile tracciare più linee con un comando solo, continuando a scrivere TO se¬ 
guito dolio virgola e dalle coordinate del punto successivo. 

Esempio: 

LINEATO 100,100 


VAI 

VAI serve o portare la penna in un determinoto punto. Per portare lo penna sul 
punto 100,200, digitare: 

VAI 100,200 

Lo penna si sposterà allo posizione 100,200. 


RETTANGOLO 

RETTANGOLO disegna quadrati o rettangoli descritti con le coordinate di due 
spigoli opposti. 
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La sintassi è simile a quella del comando LINEA, ma non sono accettati più di due 
punti. 

Esempia: 

RETTANGOLO 0,0 TO 100,200 

disegna un rettangolo lo cui diagonale ho per estremi i punti 0,0 e 100,200. 


TRAI 

TRAT abilita/disobilita il tratteggio automatico. Deve essere seguito da un numero 
compreso tra 0 e 15. 0 sta od indicare tratteggio disabilitato, ossia lineo continua, 
1-15 attivano il tratteggio; 1 seleziona un tratteggio molto fine, 15 molto largo. 

Esempio: 

TRAT3:RETTANGOLO 100,10 TO 300,400 

LINEA 100,10 TO 300,400 

TRATO RETTANGOLO 0,0 TO 400,200 


ARCO 

ARCO traccio porti di circonferenza o circonferenze di centro, raggio, e limiti as¬ 
segnati, lo sintoss è lo seguente: 

ARCO X,Y,R,RAD1,RAD2 

dove X è l'ascissa del centro, Y l'ordinata del centro, R il raggio, RADI è l'angolo 
in cui inizia l'arca e RAD2 l'angolo in cui finisce. Ricordarsi che sia RADI che 
RAD2 sono espressi in radianti, e che quindi, la circonferenza completa ha limiti 
da 0 a 

RAD2e/o RADI possono essere omessi, in tal coso il loro valore sarò 0 per RADI e 
per RAD2; se vengono omessi entrambi si avrò una circonferenza completa. 

Esempio: per tracciare una semicirconferenza di centro 200,0 e roggio 100 scrive¬ 
re: 

ARCO 200,0,100,0,3.1415 

Per tracciare un cerchio di centro 220,100 e di raggio 200 scrivere: 

ARCO 220,100,200 

Per ottenere ellissi o parti di ellissi è necessario usare il comando SCALA che verrò 
descritto più avanti. 


SEHORE 

Il comando SETTORE ha la stessa sintassi del comando ARCO, ma differisce da 
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esso in quanto, oltre o tracciare lo porte di circonferenza, unisce gli estremi di que- 
st'uKima con il centro, ottenendo un settore di circonferenza. 


ZERO 

ZERO porto lo penna aH'origine dell'attuale sistema di riferimento, ossia olle coor¬ 
dinate 0,0. Non accetto parametri. 

REL 

REL imposta il sistema di riferimento definito dall'utente, traslanda gli assi olle co¬ 
ordinate stabilite con il comando ZERO=. Non occetto parametri. 

ASS 

ASS riporta al sistema di riferimento normale, ossia a quello attivato all'accensio¬ 
ne, con origine 0,0 all'estrema sinistra. 

ZERO== 

ZERO= serve a stabilire la nuova origine relativa su cui si baseranno tutti i prossi¬ 
mi comandi grafici. Perchè sia attiva deve essere accompagnata dal modo reloti- 
vo, attivato dol comando REL. 

Deve essere seguito dalle coordinate del punto in cui si vuol fissare la nuova origi¬ 
ne. Naturalmente le coordinate di questo punto sono riferite al sistemo assoluto, 
con origine all'estrema sinistra. 

Esempio: 

ZERO= 220,0 
REL 

La nuova origine è 220,0. 

Tutti i prossimi comandi sono ora riferiti a 220,0. 

Esempio: dopo over digitato i due comandi ZERO= e REL, digitare: LINE 0,0 to 
100,100; si noterà che la lineo tracciata ha in realtà coordinate 0-t-200,0-t-0 e 
220-t-100,0-t-100 ossia 220,0 e 320,100 


SCALA 

Il comando SCALA, il cui scopo è di poter cambiare le proporzioni alle figure che 
vengono stampate dal 1520, fissa quattro parametri: 

SCALA Xper,Yper,Xadd,Yadd 

Xper è la quantità per lo quale vengono moltiplicate tutte le coordinate X inviate al 
piotter. Per avere dei disegni corrispondenti olle coordinale assegnate al basic, è 
necessario che questo parametro sia impostato a 1, che è il suo valore all'accen- 
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sione. Yper è lo quantitò per la quale vengono moltiplicate tutte le coordinate Y. 
Do notare che è pr^ibile rovesciare delle figure semplicemente impostando con 
uno quantità negativo uno o tutti e due i parametri di moltiplicazione; è possibile 
allungare, schiacciare, ridurre o ingrandire qualsiasi figura. 

Xodd è b quontità di traslazione lungo l'ascissa; tutte le coordinate X, dopo essere 
state moltiplicote per Xper, vengono sommate ad Xodd. Lo stesso vale per Yodd, 
che è riferito olle coordinate Y. 

Per conoscere i volori attuali di tali variabili, è necessario usare la funzione di SFA¬ 
SAMENTO (X), che ritorna il volore di: Xper quando X=0 : Yper quondo X=1 : 
Xodd quando X=2 e Yodd quando X=3. 

IMPORTANTE; Per resettore il plotter, lo primo lineo di ogni progromma deve 
contenere i comandi SCALA e ASS, oppure SCALA e REL. 

Per provare il comondo SCALA, caricare il programmo AQUILA dal dischetto del 
"Bosotter" scrivendo: (vedi noto) 

LOAD "AQUILA" (naturalmente dopo over caricato "Bosotter") 
scrivete poi LIST 


0 SCFlLA 1.4,1 .2,0,0 
5 PENNA ROSSA 
20 READ X,Y 
30 UAI X,Y 

40 POR I = 0 TO 62 : READ X,Y : LINEA TO 
X,Y : NEXT 

50 READ X,Y : UAI X,Y 

60 POR I = 0 TO 2 : READ X,Y : LINEA TO 
X,Y : NEXT : ZERO :CLR 

1000 DATA10.20,330,20,338,27,340,35,215, 

35,215,40,330,40,338,47,340,55 

1010 DATA222 ,55,222 ,60,330,60'.338 .67,340 

.75,230.75,230,80.330,80 .338,87 

1020 DATA340,95,230,95,223,92,195,40,190 

.35,182.35.175,40.172,50.170,70.171.77 

1030 DATA175.82,180,84,185.84,193,82,192 

.92.185.95,155,95,147.92.128.50,120.40 

1040 DATAI 12,32.102,34.101 .43,102.55.115 

.75,121.34,120.91,118.95,0.95,2.88 

1050 DATA10,30,90,80.90.75.0,75,2 .68.10 , 

60,90.60,90,55.0,55.2.48,10.40.90.40 
1060 DATA90,35,0.35,2.28.10.20 
1070 DATA165.91.175.91,170,88,165.91 
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Modificate la linea 0, andandoci sopra con il cursore, e scrivete: 

0 SCALA 0.5,-1,100,0 

poi scrivete RUN e osservate ciò che accade. 

L'aquila si è ristretta e nello stesso tempo si è anche rovesciata! 

Provate a scrivere: 

PRINT SFASAMENTO (0),SFASAMENTO (1),SFASAMENTO (2),SFASA- 
MENTO (3) 

Il risultato deve essere: 

.5 -1 100 0 

Per capire meglio come funziona questo comando, fote un po' di esperimenti com- 
biando i parametri nella linea 0. 


NOTA: I comandi LOAD e SAVE assumono come device di defoult il numero 8 
(floppy) e come secondar/ address il numero 1; per caricare un programma da 
cassetta occorrerà quindi specificare il numero di device 1 (LOAD "Nome del 
progromnKj", 1). 
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COMANDI DI GESTIONE STRINGHE 


Il 1520 olire a disegnare linee, cerchi, settori ecc. può oncche scrivere con quattro 
diversi lipi di caratteri, maiuscoli e minuscoli, sia in modo normale che inclinati di 
90 grodi o destra. 

I comondi otti a gestire la stringhe sono i seguenti: 


Versione italiana 

MISURA 

PLIST 

STAMPA 

INCLINAZIONE 

MAIUSCOLE 

MINUSCOLE 


Versione inglese 

SIZE 

PLIST 

PPRINT 

SLOPE 

UPPER 

LOWER 


STAMPA 

Il comando STAMPA serve a stampare parole, frasi o titoli con il 1520. Deve essere 
seguito o do uno frase rocchiusa tra virgolette, o da uno variabile stringa o da uno 
funzione stringa. 

Esempio; per scrivere 'CARO AMICO TI SCRIVO...' 

STAMPA "CARO AMICO TI SCRIVO" 
oppure: 

A$= "CARO AMICO TI SCRIVO":STAMPA A$ 

Per stampore dei numeri è necessario ricorrere allo funzione STR$ 

Esempio: per scrivere uno serie di 20 numeri iniziando da 1 e finendo a 20, scrivere 
il seguente programmino: 

10 POR I = 1 TO 20 
20 STAMPA STR$ (I) : NEXT 
poi scrivere RUN 

Il 1520 stamperò uno dopo l'altro i numeri dall'uno ol venti. 

È do notare che il comando stampa, quando non è seguito da parametri, invia al 
plotter un ritorno carrello, e fissa a capo lo nuova origine assoluta. 


misura 

Il comondo MISURA stabilisce il tipo dei caratteri con il quale si vuole scrivere. De- 
'r® essere seguito do una quantità compresa tra 0 e 3. 0 indica che si vuole scrivere 
con I coratteri più piccoli, 3 con i più grossi. 
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Scrivendo con i corotteri '0' si hanno o disposizione ben 80 colonne, ed il 1520 può 
essere comodomenfe utilizzato anche come stampante con i programmi di word 
processing, quali Easy script, con '1' si hanno 40 colonne, con '2' 20 e con '3' IQ. 

Provate o scrivere: 

MISURA 0:STAMPA "Bosotter 1984" 

MISURA 3:STAMPA "Bosotter 1984" 

Il primo comando imposta i caratteri od 80 colonne, ed il 1520 scriverà "Bosotter 
1984" con dei caratteri piccolissimi, il secondo imposta le 10 colonne, ed il risultoto 
è in caratteri enormi, tonto che "Bosotter 1984" non sto su uno solo lineo, e 84 vie¬ 
ne scrìtto o capo. 


PLIST 

PLIST agisce come LIST ma invece di visualizzare un prc^rommo sullo schermo lo 
scrive sul plotter. Per il funzionamento del comando PLIST leggere il comando LIST 
sul manuale del Commodore 64. 


INCUNAZIONE 

INCLINAZIONE fisso il modo scrittura con caratteri normali o ruotati di novonto 
gradi. Deve essere seguito do uno quantità compresa tra 0 e 1.0 per caratteri dirit¬ 
ti, 1 per caratteri ruotati. 

Esempio: 

INCLINAZIONE 1 : STAMPA "CIAO" 

INCLINAZIONE 0 : STAMPA "CIAO" 

il primo comondo stampo CIAO con caratteri ruotati, il secondo con caratteri nor¬ 
mali. 


MAIUSCOLE-MINUSCOLE 

MAIUSCOLE seleziona i caratteri maiuscoli, mentre MINUSCOLE quelli minuscoli. 
Esempio: 

MAIUSCOLE STAMPA "CARATTERI MAIUSCOLI":MINUSCOLE:STAMPA 
"CARATTERI MINUSCOLI" 
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I COMANDI “BASIC" 


Questi coinondi focilitono la programmazione basic, rendendo più ogevole il pas¬ 
saggio sul Commodore 64 di programmi creati per altri computers, e rendendo più 
potente il basic del C64.1 comando sono i seguenti: 


Versione italiona 

ELSE 

CGOTO 

CGOSUB 

CPOKE 

JOY 

PADDLE 

HEX$ 

BIN$ 

CPEEK 


Versione inglese 

ELSE 

CGOTO 

CGOSUB 

CPOKE 

JOY 

PADDLE 

HEX$ 

BIN$ 

CPEEK 


ELSE 

ELSE nprogramma il comando IF THEN, che normalmente esegue i conr>andi che 
seguono THEN solo se la condizione che segue IP è vera, ossia se il valore o il ri¬ 
sultato dell'operazione l^ico che segue IF è diverso do 0. 

In questo modo è possibile utilizzare la struttura IF..THEN..ELSE. 

Se il risultato dell'operazione che segue IF è vero allora vengono eseguiti i coman¬ 
di che seguono THEN ed ignoroti quelli che seguono ELSE, se è falso allora acca¬ 
de il contrario, cioè sono eseguiti i comandi che seguono ELSE ed ignorati quelli 
che seguono THEN. 

Esempio: 

10 INPUT A 

20 IF A - 10 THEN STAMPA "A=10" : ELSE STAMPA "A<> 10" 

30 GOTO 10 
RUN 

il progromma chiede di scrivere un valore; se questo è 10 allora scrive "A= 10" sul 
1520, altrimenti scrive "A <> 10". 


CGOTO-CGOSUB 

CGOTO e CGOSUB hanno lo stessa funzior\e dei comondi basic GOTO e GO- 
SUB, però occettono anche formule e variabili, senza dover ricorrere all'istruzione 
ON GOTO/GOSUB. 
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CPOKE 

COKE è «mie db IK>KE (tei Imsìc 64, mo Irollo vokxt 0 16 bit (cioè nwwi com- 
pc«si Ira 0 e 6SS3S), convertefxioll in parte allo e porte bosso, meltendo lo porte ol¬ 
io nel byte di indirizzo uguole ol pomo poramelra deH'isIrvzione e lo porle olio nel 
byte seguente. 

Esempio: 

CPOKE 10000,32768 

mette nel byte 10000 il volore 0 e nel byte 10001 il valore 128. 


CPEEK 

Lo (unzione CPEEK è come lo funzione basic 64 PEEK, ma ogtsce rilomondo un va¬ 
lore o 16 bit, con un procedimento simile o quello del comando CPOKE. 

Esempio: 

CPOKE 1000033452 
PRINT CPEEK (10000) 

234S2 viene visuolizzolo sullo schermo. 


X)Y 

Lo funzione JOY serve o leggere lo stato di uno dei due joystick opplicabili al 
Commodore 64. E necessario specificore quote dei due joystick si vuole leggere; 
per leggere il joystick nello control port I il volore corrispondente è 1, per le^e 
quello nello control port 2 il valore do specificare è 0. 

Bempio: 

10 PRINT JOY (0)3OY(1):GOTO10 
RUN 

Si vedrò una doppia filo di numen scorrere suite schermo; quello di sinistro corri¬ 
sponde al joystick in porto 2, quello di destro al joystick m porto 1. 

I valori riportali dalla funzione sono i seguenti: 

I: joyinolto 
2: joy in bosso 
4: joy 0 sinistro 
8: joy 0 destro 
128: lire 

Se il |oy^ è posto in diogonole, il volore ossunto dolio funzione JOY sorò lo 
sommo dei due valori corrispondenti 

Esempio: in olto-sinistro > 1 +4 s 5 

|oy in boss<Htestro-fire=2-i-8-t128=138 
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PAOOLE 

Lo Kioziooe PADDLE legge la posizione del potenziometro di uno delle quottro 
poddle. È necessario specificare tra parentesi il numero dello poddle che si vuole 
leggere, che deve essere compreso tra 0 e 3. Per rivelare il fire delle poddle si deve 
ricorrere olio funzione JOY. 


HEX$ 

Lo funzione HEX$ trosformo uno quantità numerica decimale in formoto stringa 
esodecimole. Se lo quantità decimale è minore di 256 allora la stringa esadecima- 
le sorò lungo 2 coratteri, oltrimenti sarà lungo 4. 

Esempio: 

PRIMI HEX$ (240) 
il 64 scriverà FO. 

PRIMI HEXS (65535) 
il 64 scriverò FFFF. 


BIN$ 

Lo funzione BIM$ ogisce in modo simile a HEX$, solo che riporta una stringa bina¬ 
rio onzichè esodecimole. Lo stringa sarò lunga 8 caratteri se la quantità da conver¬ 
tire è minore di 256, altrimenti sarà lunga 16 caratteri. 

Esempio: 

PRIMI BIMS (64) 

RtSPOSIA: 01000000 
PRIMI BIMS 

RISPOSIA: 1111111111111111 
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I COMANDI DI GESTIONE DISCO 


Basotter aggiunge anche dei comandi che servono a gestire le funzioni del drive in 
modo più semplice e veloce, rendendo possibili le comunicazioni senza dover 
continuamente aprire e chiudere noiosissimi canali di comunicazione. I comandi 
disco sono i seguenti: 


Versione italiana 
ELENCA 
CANCELLA 
CONVALIDA 
RINOMINA 
DISTRUGGI 
INIZIALIZZA 
DISCO 
1 


Versione inglese 
DIRECTORY 
SCRATCH 
VDATE 
RENAME 
FMAT 
INITIALIZE 
DISK 
] 


ELENCA 

Questo comondo visualizza sullo schermo la directory del disco, ossia l'elenco dei 
programmi/files presenti sul dischetto nel drive. Non necessita di parametri, e vi¬ 
sualizza tutti i files e programmi. Al posto di ELENCA può essere usato il comando 
] che è sicuramente più veloce e comodo, e consente inoltre di visualizzare la di¬ 
rectory con selezione. Vedere comando ]. 


CANCELLA 

Questo comando serve a cancellare un file o un programmo o ur>a serie di files/ 
programmi dal dischetto presente nel drive. Deve essere seguito da un parametro 
stringa, il cui contenuto è un nome o uno serie di nomi separati da virgola; essi de¬ 
vono corrispondere ai nomi dei files/programmi da cancellare. 

Esempio: 

SCANCELLA "PROG1" 

2: CANCELLA "PROG1,PROG2,PROG3" 

3: CANCELLA "PROm" 

L'esempio 1 cancella il programmo o file che ho per nome'pregi .L esempio 2 
cancella i programmi/files pregi, prog2 e prog3, l'esempio 3 cancello tutti i nles/ 
programmi il cui nome comincia con prò. per usare le 'pottem', • metodi per 
cancellare più fìles con un comando solo, leggere il manuale del drive. 
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estensione basic per il PlOTTER 1520 


CONVALIDA 

CONVALIDA esegue il comando 'VALIDATE', descritto nel manuale del drive. Non 
deve essere seguito do parametri Lo suo funzione è quello di ricontrollare lo BAM 
(Block Avoiloble Mop, ossia moppo dei blocchi liberi), eventualmente modificon- 
dolo qualora non corrisponda olio reale memoria occupoto dai files/progrommi 


RINOMINA 

Ouesto comando combio il nome di un file o programmo. Deve essere seguito do 
uno variabile o costante stringa 

Esempio: per cambiare il nome di PROCI in PROGRAMMA, scrivere: 
RINOMINA "PROGRAMMA=PROGr' 

Il primo nome è il nuovo nome che si vuol dare al programmo, esso deve essere 
seguilo do un =, poi vi è il vecchio nome che si vuole cambiare. 

Naturalmente il file o progromma non viene assolutamente modificoto. 


DISTRUGGI 

Questo comando è l'equivalente del comando 'NEW' descritto nel monuole del 
drive, e serve o formattare un dischetto. L'operazione è necessaria qualora si ab¬ 
bia un dischetto nuovo, che deve essere iniziolizzoto primo di poter essere usato 
normalmente. Tuttavia può venir formattato anche un disco già usato, in tal coso 
tutti I doti presenti su di esso verranno persi 

È necessario ottribuire un nome ed un identificatore al disco che si vuole formotto- 
re; luttovio se il disco è già stato usato con il drive del 64 è possibile omettere l'i- 
dentificotore, ciò comporto un notevole risparmio di tempo ma il drive non cancel¬ 
lerà fisicamente tutti i doti presenti sul disco, di cui verr àzzeroto solamente lo di¬ 
rectory 

Esempio: per formattare un dischetto con nome '—COMMODORE 64—' ed identi- 
ficotore '64' scrivere; 

DISTRUGGI "-COMMODORE 64-,64" 

Per cancellare un dischetto già usato è possibile scrivere; 

DISTRUGGI "-COMMODORE 64-" 

In tal coso il disco manterrà l'identificatore precedente. 


INIZIALIZZA 

Questo comando serve ad inizializzare il disco, è l'^uivolente del comando INI- 
TIALIZE descritto nel manuale del drive. Non necessita di alcun parametro. 
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lASOTTB 


DISCO 

Il comondo DISCO sefve per leggere lo stato del disco e per cotnonicore quabiosi 
comondo al drive. Se twn è seguito do porometn legge e «suolino lo stalo, ollri- 
menti comunico ol drive i poromeiri, che devono essere stringhe. 

Esempio: DISCO 

Se il disco non è in errore, verrò visuolizzoto: 00,OK,00,00 
DISCO “11" 

Iniziolizzo il drive 1 (se si ho urto unita o doppio drive 4040 o 3040), il che non è 
possibile con il comondo INIZIALI2ZA, che iniziolizzo sempre il drive 0. 


COMANDO T 

Lo parentesi quodro destra ho uno doppia opplicozione; se usata senzo porometri 
visualizza lo stato del disco, nello sle^ maniero del comando DISCO, altrimenti 
deve essere seguita do un 'V, e in tal coso visuolizzerò lo directory, come il comon¬ 
do ELENCA. Ciò che è possibile in più rispetto o quest'ultimo comando, è lo «suo- 
lizzozione dello directory con selezione. 

Esempio: 

)S directory normole 

]$:pro visuolizzo solo i files/progrommi che iniziano con prò. 
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ESTENSIONE BASIC PER IL PLOTTER 1520 


COMANDI BASIC "BASOTTER 84' 


penna 

zero= x,y 
zero 

linea; tox,y taxi,yl... 
lineo: x.ytoxl.yl... 
rei 

vaix.y 
oss 

tratx 

arco xl ,yl ,r,rad1 ,rad2 
sector xl ,y 1 ,r,rad1 ,rad2 

rettangolo x,y to xl ,yl 

misura x 

plist 

stampa 

inclinazione x 

scalo x,y^,h 

maiuscole 

minuscole 

elenca 

concella 

convalido 

rinomina 

distruggi 


nera/blu/verde/rossa 

cambia il colore dello penna del plotter 

porta la penna alle coordinate x,y e setta l'origine relativo 
porta la penna aH'origine relativo 

congiunge i ponti x,y; xl ,yl... 

setta i parametri di output in scola relativa all'origine 
settato con zero= 

porta la penna alle coordinate x,y 

setta i parametri di output in scala assoluta: tutte 
le coordinate si riferiranno all'origine assoluta (0,0) 

selezione il tratteggio: 0>*linee continue: 

1-15 = tipo di tratteggio 

traccia l'arco di centro xl,yl ; di roggio r neH'intervallo 
compreso tra rodi e rad2 (in radianti] 

come arco, ma congiunge l'arco con il centro. 

(i parametri radi e rod2 possono essere omessi, 
in tal caso il loro valore sarò 0 per radi e 2 pi per rad2) 

disegna il rettangolo di diagonale x,y to xl pel 
(x(4) seleziona i caratteri di dimensioni x 
lista il programma in memoria sul plotter 
come print ma su plotter 

x=0ox“1 0=caratteri nornrali; 1 “caratteri ruotati 
in senso orario di 90 gradi 

x=fattore di moltiplicazione delle coordinate x di tutti 
i comandi; y fattore di moltiplicazione y; k = fattore 
di traslazione x; h “fattore di traslazione y 

seleziona i caratteri maiuscoli 
seleziona i caratteri minuscoli 

visualizza la listo dei file/programmi presenti sul disco 

cancello sul disco un file/programma 

esegue la validote del disco 

cambio il nome di un file/prg su disco 

formatta il disco, assegnandogli il nome doto 
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BASOTTER 

iniziolizzo 

disco 

disco "com" 

cgo<o 

cgosub 

else 

itoliono 

english 

cpoke 

FUNZIONI 

Joy(x) 
poddle (x) 
hes$(x) 
bin$ (x) 

sfasamento (x) 
cpeek (x) 


iniziolizzo il drive 

visualizza lo stato del disco 

fa eseguire il comando (com) al drive 

come goto ma accetto formule e variabili 

carne gosub... 

struttura if...then...else 

cambia le Keywords da inglese a italiano 

cambia le Keywords da italiano a inglese 

come poke ma a 16 bits 


ritorna la posizione del joystik x 

ritorna il valore della paddle x 

ritorna la stringa esadecimale corrispondente a x 

come hex$ ma binaria 

x=1 : ritorna il fattore x del comondo scale; x=2 
il fattore y; x=3 k; x=4 h 

ritorna il valore a 16 bit dello locazione 
x+256s|tlocozione x+1 .a 
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ESTENSKDNE BASIC PER II PIOTTER 1520 


AQUILA 

0 SCALA 1 . 4,1 .2.0,0 
5 PENNA ROSSA 
20 READ X,Y 
30 UAI X,Y 

40 POR I = 0 TO 62 : READ X,Y : LINEA TO 
X,Y : NEXT 

50 READ X,Y : DAI X,Y 

60 POR I = 0 TO 2 : READ X,Y : LINEA TO 
X,Y : NEXT ; ZERO :CLR 

1000 DATA10.20,330,20,338,27.340,35,215, 

35,215,40,330.40,338,47,340,55 

1010 DATA222,55.222,60,330,60,338,67,340 

.75,230.75,230.80,330,80,338,87 

1020 DATA340,95,230,95.223,92,195,40,190 

.35,182,35,175,40,172,50,170.70,171,77 

1030 DATA175,82,180,84,185,84,193,82,192 

.92.185,95,155,95,147,92,128.50.120,40 

1040 DATA112,32,102,34.101,43,102,55,115 

.75.121 .84.120,91,118,95,0.95,2,88 

1050 DATA10,80.90,80,90,75.0.75.2.68,10, 

60.90,60,90.55.0,55.2.48,10.40,90.40 

1060 DATA90,35.0.35,2,28.10,20 

1070 DATA165,91.175,91.170,88,165.91 
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BASOTTBI 


DIAGRAiWMI 


10 SCALA 1,1,0,0 : PENNA BLU : ASS : TRA 
T 0 

20 MISURAI : STAMPA': STAMPA 
30 FORI=0TO5;ACID=RNDC13*10:NEXT 
40 STAMPA" — TABELLA DATI — ' '< 5TAMP 
A : PENNA NERA 
50 UAI 0,-40:STAMPA 

90 FORI=0TO5:STAMPA'DATO"+STRiCI + l3+": ' 

: UAI200,0:STAMPASTRiCACI33:STAMPA:NEXT 
65 PENNA BLU : STAMPA:STAMPA:STAMPA UISU 
ALIZZAZIONE DIAGRAMMA A BARRE' 

70 STAMPA:stampa:LINEA 60,0 TO 60,-200 T 
0 450,-200 : GOSUB200 

71 UAI0,-200:PENNA UERDE 

72 niSURA0 : FORI=0TO5 :UAI 70+60*1,-230 
: STAMPA DATO: ■+STRÌCI + 13:NEXT:MISURAI 

80 FORI=0TO10 : UAI 0,-200+1*20 : TRAT 0 
; STAMPARIGHTiCSTRtCI3,23 
85 TRAT 7 : LINEA TO 60,-200+1*20 
90 NEXT 

100 PENNA ROSSA : TRAT0 :. FORI=0TO5 
110 RETTANGOLO 70+60*1,-199 TO 110+60*1, 
-199+AC13*20 : GOSUB300 :NEXT 

119 STAMPA:STAMPA:STAMPA:STAMPA:STAMPA 

120 STAMPA : STAMPA : STAMPA'UISUALIZZAZ 
IONE DIAGRAMMA A TORTA' 

140 ZERO= 220,-170 : J=0 : REL 

150 FORI=0TO5: J=J+ACn:NEXT:TP = C2*it3/J; J 

=0 


160 F0RI=1T06:RCI3=J+ACI-1D*TP/2;TCID=J+ 

ACI-13*TP:J=TCI3:NEXT 

165 FORI=1T06:PENNA CIAND3] 

170 SETTORECOSCRCID3*10,SINCRI I33*10,100 
.TCI-13,TCI3:NEXT:MISURA0 
175 PENNA NERA : ASS 




190 STAMPALEFTiCSTRiCACI-l 
I=0TO10;STAMPA:NEXT:END 


3.5 3:NEXT;F0R 
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ESTtNSKJNE BASIC PER IL PlOTTtR 1520 


200 LINEA 60,0 TO 65,5 TO 65,-195 TO 60, 

-200ILINEA65,-1951070,-195 

210 PORI=1T06:LINEA55+I*60,-195TO70+I*60 

.-195 :NEXT 

220 RETURN 

300 LINEA70+60*!,-199+ACIDx20TO75+60*I,- 
194+ACIDX20TO115+60*f,-194+ACID*20 
310 LINEA TOl10+60*1 ,-199+ACID*20 
320 LINEAI 15+60*1,-194+ACI3*2010115+60*1 
,-19470110+60*1,-199:RETURN 
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MSOTTBt 


SINX + SINX/2 

10 flSS : TRflT0 : lNCLINflZIONE0 : SCALAI, 

1 , 0.0 

20 PENNA ROSSA : OAI 50,0 : MISURA 2 
30 STAMPA'Y" : PENNA BLU : STAMPA"=SIN X 
♦SIN X/2": UAI 0,-400 : STAMPA : PENNA 
NERA 

35 2ERO= 240,0 : REL : RETTANGOLO -240,4 
00 TO 239,-400 

40 LINEA 0,400 TO 0,-400 : LINEA -240,0 

TO 240,0 : UAI 0,-400 : PENNA BLU 

50 POR X=-400 TO 400 STEP 3 

60 LINEA TO -SINCX/25)xl00.X : NEXT 

70 UAI0.400 : POR X=-400 TO 400 STEP 10 

80 PENNA UERDE : UAI 0,-400 

90 F^R X=-400 TO 400 STEP 3 

100 LINEA TO -SINCX/501*100,X : NEXT 

110 PENNA ROSSA : UAI 0,-400 

120'POR X=-400 TO 400 STEP 3 

130 LINEA TO -SINCX/50]*100-SINCX/25D*10 

0,X : NEXT 

140 UAI 0,-400 

150 MISURAI : PENNA BLU : PLIST 
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